Path.Input = './IPCC_chem_div.csv';

ColorMap1 = readtable(Path.Input);
ColorMap2 = table2array(ColorMap1);

if all(ColorMap2 <= 1)
	ColorMap = ColorMap2;
else
	ColorMap = ColorMap2 ./ 256;
end

ColorMapName = Path.Input(3:end-4);

figure()
colormap(ColorMap);
rgbplot(ColorMap);
colorbar('Ticks',[])
print(gcf, ColorMapName, '-dpng');

save(ColorMapName, 'ColorMap');

